inherited OpenWithPrefsFrame: TOpenWithPrefsFrame HelpType = htKeyword HelpKeyword = 'Open_With_Applications' Caption = '"Open With" Applications' object ListTable: TUiListTable [0] Left = 8 Top = 8 Width = 409 Height = 117 DragMode = dmAutomatic HeaderCols.Items = ( '136' '136' '137') HeaderCols.WideStrings = ( 'Description' 'Command Line' 'Shortcut') HeaderHeight = 17 TabOrder = 0 VertLines = True WantReturns = True OnAllowDeleteItem = ListTableAllowDeleteItem OnClick = ListTableClick OnDeleteItem = ListTableDeleteItem OnDragDrop = ListTableDragDrop OnDragOver = ListTableDragOver OnGetDisplayUtf8Text = ListTableGetDisplayUtf8Text OnInsertItem = ListTableInsertItem OnItemsDeleted = ListTableItemsDeleted end object NewBtn: TUiButton [1] Left = 8 Top = 128 Caption = '&New...' TabOrder = 1 OnClick = NewClick AutoSize = asLeft end object MoveUpBtn: TUiBitBtn [2] Tag = -1 Left = 81 Top = 128 Width = 24 Hint = 'Move Up' TabOrder = 2 OnClick = MoveClick ImageIndex = imgUp Images = BcImages.MainImages end object MoveDownBtn: TUiBitBtn [3] Tag = 1 Left = 105 Top = 128 Width = 24 Hint = 'Move Down' TabOrder = 3 OnClick = MoveClick ImageIndex = imgDown Images = BcImages.MainImages end object DeleteBtn: TUiButton [4] Left = 129 Top = 128 Caption = '&Delete' TabOrder = 4 OnClick = DeleteClick AutoSize = asLeft end object CurGroupBox: TUiGroupBox [5] Left = 8 Top = 160 Width = 409 Height = 225 Caption = 'Edit selected' TabOrder = 5 object DescriptionLbl: TUiLabel Left = 8 Top = 16 Height = 13 Caption = 'Description:' FocusControl = DescriptionEdit end object ShortCutLbl: TUiLabel Left = 176 Top = 16 Height = 13 Caption = '&Shortcut:' FocusControl = ShortCutEdit end object CmdLineLbl: TUiLabel Left = 8 Top = 56 Height = 13 Caption = 'Command line:' FocusControl = CmdLineEdit end object CmdLineBrowseBtn: TUiBrowseSpeedButton Left = 344 Top = 72 Hint = 'Browse for Application' BrowseEdit = CmdLineEdit end object CmdLineArgBtn: TUiSpeedButton Left = 376 Top = 72 Hint = 'Insert Parameter' Flat = False ImageIndex = imgDropDown Images = BcImages.MainImages OnClick = CmdLineArgClick end object WorkingDirLbl: TUiLabel Left = 8 Top = 96 Height = 13 Caption = 'Working folder:' FocusControl = WorkingDirEdit end object WorkingDirBrowseBtn: TUiBrowseSpeedButton Left = 264 Top = 112 Hint = 'Browse for Working Folder' BrowseComboBox = WorkingDirEdit end object PathDelimLbl: TUiLabel Left = 296 Top = 96 Height = 13 Caption = 'Path delimiter:' FocusControl = PathDelimEdit end object DescriptionEdit: TUiEdit Left = 8 Top = 32 Width = 161 Height = 21 TabOrder = 0 OnChange = CurChangedClick end object ShortCutEdit: TUiShortCutEdit Left = 176 Top = 32 Width = 129 Height = 21 TabOrder = 1 OnChange = CurChangedClick end object ShortCutRemoveBtn: TUiButton Left = 312 Top = 32 Width = 89 Caption = 'Remove' TabOrder = 2 OnClick = ShortCutRemoveClick end object CmdLineEdit: TUiBrowseEdit Left = 8 Top = 72 Width = 329 Height = 21 TabOrder = 3 OnChange = CurChangedClick OnBrowse = CmdLineBrowse end object WorkingDirEdit: TUiBrowseComboBox Left = 8 Top = 112 Width = 249 Height = 21 AutoComplete = False ItemHeight = 13 TabOrder = 4 OnChange = CurChangedClick DirsOnly = True OnBrowse = WorkingDirBrowse end object PathDelimEdit: TUiEdit Left = 296 Top = 112 Width = 24 Height = 21 MaxLength = 2 TabOrder = 5 OnChange = CurChangedClick end object HandleFilesEdit: TUiCheckBox Left = 8 Top = 144 Height = 17 Caption = 'Accepts files' TabOrder = 6 OnClick = CurChangedClick end object HandleFoldersEdit: TUiCheckBox Left = 208 Top = 144 Height = 17 Caption = 'Accepts folders' TabOrder = 7 OnClick = CurChangedClick end object RefreshWhenDoneEdit: TUiCheckBox Left = 8 Top = 164 Height = 17 Caption = 'Refresh when finished' TabOrder = 8 OnClick = CurChangedClick end object MultiInstanceEdit: TUiCheckBox Left = 8 Top = 184 Height = 17 Caption = 'Multiple instances' TabOrder = 9 OnClick = CurChangedClick end object WaitForEdit: TUiCheckBox Left = 24 Top = 204 Height = 17 Caption = 'Wait for previous instance to finish' TabOrder = 10 OnClick = CurChangedClick end end inherited DefaultBtn: TUiButton Caption = 'Clear' TabOrder = 6 end object CmdLineArgPopup: TUiPopupMenu Left = 8 Top = 8 object PathNameItem: TUiMenuItem Tag = 102 Caption = 'Absolute Path and Filename (%f)' OnClick = CmdLineItemClick end object NumItem: TUiMenuItem Tag = 108 Caption = 'Current Line Number (%l)' OnClick = CmdLineItemClick end object NameItem: TUiMenuItem Tag = 110 Caption = 'Filename (%n)' OnClick = CmdLineItemClick end object PathItem: TUiMenuItem Tag = 112 Caption = 'Absolute Path (%p)' OnClick = CmdLineItemClick end object ExtItem: TUiMenuItem Tag = 120 Caption = 'Extension, Including '#39'.'#39' (%x)' OnClick = CmdLineItemClick end object BasenameItem: TUiMenuItem Tag = 98 Caption = 'Filename Without Extension (%b)' OnClick = CmdLineItemClick end object RelPathNameItem: TUiMenuItem Tag = 70 Caption = 'Relative Path and Filename (%F)' OnClick = CmdLineItemClick end object RelPathItem: TUiMenuItem Tag = 80 Caption = 'Relative Path (%P)' OnClick = CmdLineItemClick end end end